www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\admin\adminchannel_qiye\D_del_chnl.asp

    <%


'**************************************************************
' 新动软网站管理系统
' 官方网站: http://www.aspcpu.com
' 系统作者: 阮丁远(网名：天下程序)
' Copyright 新动软网站管理系统 版权所有
'**************************************************************


%>





<LINK href="../css.css" type=text/css rel=stylesheet>
<%

dir_set="../../"


%>


<!--#include file=../../inc/conn.asp-->
<!--#include file=../../inc/Functionb.asp-->

<!--#include file=../../inc/ajaxLIB.asp-->

<!--#include file=../inc/checkadmin2.asp-->

<!--#include file=../../inc/functionFiless.asp-->





<%


if find_dataw("qitashezhi123","0",10)<>"1" and qx_if_max=0 then



response.redirect "../D_suodinguser.asp"

end if





AJAXshowLoader()


%>



	<%
biao="[ND_channel]"



set rs441=server.CreateObject("adodb.recordset")
rs441.open "select * from "&biao&" where id="&request("id"),conn,1,1


ssss121=rs441("sys_content_type_name")

'为首页固定频道id的标签的正常工作，所以 系统默认频道无法删除
'为首页固定频道id的标签的正常工作，所以 系统默认频道无法删除
'为首页固定频道id的标签的正常工作，所以 系统默认频道无法删除
if lcase(ssss121)="article_id35" or lcase(ssss121)="dan_article_id30"  or lcase(ssss121)="article_id35"  or lcase(ssss121)="cp_id36"  or lcase(ssss121)="dan_article_id25" or lcase(ssss121)="down_id32" then

%>
<script language="javascript">
alert("系统默认内容频道无法删除，你可以点击修改频道并把此频道设置为隐藏，这样前台主菜单就不显示其频道菜单项了");
self.location="D_admin_chnl.asp?sys_content_type=<%=sys_content_type%>";

</script>



<%

else







set rs44=server.CreateObject("adodb.recordset")
rs44.open "select * from "&biao&" where id="&request("id"),conn,1,1

ssss1=rs44("lanmu_type")
ssss12=rs44("sys_content_type_name")


conn.execute("delete from "&biao&"  where id="&request("id"))


if ssss1=a1 then

conn.execute("delete from ND_Article where sys_content_type='"&ssss12&"'")

conn.execute("delete from ND_Article_class where sys_content_type='"&ssss12&"'")

conn.execute("delete from ND_Article_Special where sys_content_type='"&ssss12&"'")



end if


if ssss1=a2 then

conn.execute("delete from ND_down where sys_content_type='"&ssss12&"'")

conn.execute("delete from ND_down_class where sys_content_type='"&ssss12&"'")

conn.execute("delete from ND_down_server where sys_content_type='"&ssss12&"'")

conn.execute("delete from ND_down_Special where sys_content_type='"&ssss12&"'")

end if


if ssss1=a3 then

conn.execute("delete from ND_pic_or_sp where sys_content_type='"&ssss12&"'")

conn.execute("delete from ND_pic_or_sp_class where sys_content_type='"&ssss12&"'")

conn.execute("delete from ND_pic_or_sp_Special where sys_content_type='"&ssss12&"'")



end if
if ssss1=a4 then

conn.execute("delete from ND_prod where sys_content_type='"&ssss12&"'")

conn.execute("delete from ND_prod_class where sys_content_type='"&ssss12&"'")

end if

if ssss1=a5 then

conn.execute("delete from ND_danArticle_class where sys_content_type='"&ssss12&"'")

end if

if ssss1=a6 then

conn.execute("delete from ND_nolistdanArticle where sys_content_type='"&ssss12&"'")

end if



conn.execute("delete from ND_pinlun where lanmu_type='"&ssss1&"' and sys_content_type='"&ssss12&"'")


%>
<script language="javascript">
alert("删除成功");
parent.c_menu.window.location.reload();
self.location="D_admin_chnl.asp?sys_content_type=<%=sys_content_type%>";

</script>




<%
end if
%>



<%
AJAXcloseLoader()
%>